# A function for formatting numbers that go in the table
prep_table_rows = function(out_row, se=FALSE, wholenum=FALSE){
  if(se==TRUE){
    row_str = paste0(" & ",
      glue_collapse(glue("({xx})", xx=format(round(out_row, 2),
        big.mark=",", nsmall=2)), " & ", last = ""))
  }
  else if(wholenum==TRUE){
    row_str = paste0(" & ",
      glue_collapse(glue("{xx}", xx=format(round(out_row, 0),
        big.mark=",", nsmall=0)), " & ", last = ""))
  }
  else{
    row_str = paste0(" & ",
      glue_collapse(glue("{xx}", xx=format(round(out_row, 2),
        big.mark=",", nsmall=2)), " & ", last = ""))
  }
  return(row_str)
}